@echo off
setlocal enabledelayedexpansion

:: 设置包含部分文件名的文本文件
set "filelist=filelist.txt"

:: 设置目标文件夹（如果不存在则自动创建）
set "target_folder=D:\testCopy"
if not exist "%target_folder%" mkdir "%target_folder%"

:: 设置搜索的根目录（默认当前目录）
set "search_dir=."

echo 正在复制文件...

:: 读取 filelist.txt，逐行处理
for /f "usebackq delims=" %%a in ("%filelist%") do (
    set "partial_name=%%a"
    
    :: 在 search_dir 及其子目录中查找匹配的文件
    for /r "%search_dir%" %%f in ("!partial_name!*.*") do (
        copy "%%f" "%target_folder%"
        echo 已复制: %%~nxf
    )
)

echo 复制完成。
pause
